﻿
Public Class ConnectionEventArgs
    Inherits EventArgs

    Private _status As ConnectionStatus
    Public ReadOnly Property Status() As ConnectionStatus
        Get
            Return _status
        End Get
    End Property

    Public Sub New(ByVal status As ConnectionStatus)
        _status = status
    End Sub
End Class
